From: Geoff Voelker <voelker@cs.washington.edu>
Date: Tue, 7 Nov 1995 07:47:47 +0000 (+0000)
Subject: mouse.el [win32] (mouse-set-region):
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~85638
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=f93f3cf59ea0aee0da171f0bb9f359a22fc6e392;p=emacs.git

mouse.el [win32] (mouse-set-region):
Test for 'win32 window system as well as 'x.
---

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 2e50a44f676..98711f4e767 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -402,6 +402,7 @@ This should be bound to a mouse drag event."
     (or transient-mark-mode
 	(eq (framep (selected-frame)) 'x)
 	(eq (framep (selected-frame)) 'pc)
+	(eq (framep (selected-frame)) 'win32)
 	(sit-for 1))
     (push-mark)
     (set-mark (point))